home *** CD-ROM | disk | FTP | other *** search
/ Geek Games #12 / GEGA012.iso / Jogos de Azar / 599.swf / scripts / frame_163 / DoAction.as
Text File  |  2006-01-17  |  282b  |  10 lines
  1. mixedcards = "";
  2. i = "1";
  3. while(!(cardst eq ""))
  4. {
  5.    ncard = random(length(cardst) / "3");
  6.    indexcard = ncard * "3" + "1";
  7.    mixedcards = mixedcards add cardst.substr(indexcard,"3");
  8.    cardst = cardst.substr("1",ncard * "3") add cardst.substr(indexcard + "3","-1");
  9. }
  10.